#!/usr/bin/perl
#error.cgi

require './mirrorman-lib.pl';
&ReadParse();

&header($text{'mirror_title'}, "" , "index", 0, 1,);
print "Error Page:";

####################################
open(FH, "/etc/rsyncd.conf");
@conf=<FH>;
close(FH);

$modc="a";
&get_mod_line($modc,@conf);
print "Mod A starts at ".$start_line.",";
print "ends at ".$end_line."|";
&get_end_line(@conf);
print "END line is ".$endline;
####################################


&footer("/", $text{'index'});
